#Homework 1 
#Part 1 
s <- "What is the sum of 2+2?"
a <- c(s,2+2)
print(a,quote=FALSE)

#Play with the vectors
v <- c(1, 2, 3, 4, 5, 6, 7, 8, 9, 10) # Create a vector
plot(v) # Plot the vecto without labels
plot(v,main="My vector", xlab="Vector numbers", ylab="Factor") #Adding Labels to the graph
mean <- mean(v) #calculate the mean of the vector and storage in mean





